home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue24 / pgtray3x / PGTRAY3X.ZIP / Setup.exe / DEMO.DPR next >
Encoding:
Text File  |  1997-06-24  |  693 b   |  24 lines

  1. program Demo;
  2. { NOTE: This project source has been modified to force the Application  }
  3. { to be hidden when it loads. }
  4.  
  5. uses
  6.   { 1. The following line MUST be the first line in the uses clause to force }
  7.   { the Application to be hidden on startup. }
  8.   {$IFDEF WIN32} PGHide32,PGTray95, {$ELSE} PGTray95, {$ENDIF}  
  9.   Forms,
  10.   WinTypes,
  11.   WinProcs,
  12.   Main in 'MAIN.PAS' {MainForm};
  13.  
  14. {$R *.RES}
  15.  
  16. begin
  17.   Application.Title := 'Animated TrayIcon VCL for Delphi and C++ Builder';
  18.   Application.CreateForm(TMainForm, MainForm);
  19.  
  20.   { 2. Put the following line in place of the Application.Run line }
  21.   { normally found here in the project source. }
  22.   RunTrayApplication;
  23. end.
  24.